home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / PROGRAMM / ASSEMBLE / H145.ZIP / ASXXXX_3.ZIP / M01PST.C < prev    next >
C/C++ Source or Header  |  1990-07-18  |  6KB  |  214 lines
  1. /* m01pst.c */
  2.  
  3. /*
  4.  * (C) Copyright 1989,1990
  5.  * All Rights Reserved
  6.  *
  7.  * Alan R. Baldwin
  8.  * 721 Berkeley St.
  9.  * Kent, Ohio  44240
  10.  */
  11.  
  12. #include <stdio.h>
  13. #include <setjmp.h>
  14. #include "asm.h"
  15. #include "m6801.h"
  16.  
  17. struct    mne    mne[] = {
  18.  
  19.     /* machine */
  20.  
  21.     NULL,    ".setdp",    S_SDP,        0,    0,
  22.     NULL,    ".hd6303",    S_HD63,        0,    0,
  23.  
  24.     /* system */
  25.  
  26.     NULL,    "CON",        S_ATYP,        0,    A_CON,
  27.     NULL,    "OVR",        S_ATYP,        0,    A_OVR,
  28.     NULL,    "REL",        S_ATYP,        0,    A_REL,
  29.     NULL,    "ABS",        S_ATYP,        0,    A_ABS|A_OVR,
  30.     NULL,    "NOPAG",    S_ATYP,        0,    A_NOPAG,
  31.     NULL,    "PAG",        S_ATYP,        0,    A_PAG,
  32.  
  33.     NULL,    ".byte",    S_BYTE,        0,    0,
  34.     NULL,    ".db",        S_BYTE,        0,    0,
  35.     NULL,    ".word",    S_WORD,        0,    0,
  36.     NULL,    ".dw",        S_WORD,        0,    0,
  37.     NULL,    ".ascii",    S_ASCII,    0,    0,
  38.     NULL,    ".asciz",    S_ASCIZ,    0,    0,
  39.     NULL,    ".blkb",    S_BLK,        0,    1,
  40.     NULL,    ".ds",        S_BLK,        0,    1,
  41.     NULL,    ".blkw",    S_BLK,        0,    2,
  42.     NULL,    ".page",    S_PAGE,        0,    0,
  43.     NULL,    ".title",    S_TITLE,    0,    0,
  44.     NULL,    ".sbttl",    S_SBTL,        0,    0,
  45.     NULL,    ".globl",    S_GLOBL,    0,    0,
  46.     NULL,    ".area",    S_DAREA,    0,    0,
  47.     NULL,    ".even",    S_EVEN,        0,    0,
  48.     NULL,    ".odd",        S_ODD,        0,    0,
  49.     NULL,    ".if",        S_IF,        0,    0,
  50.     NULL,    ".else",    S_ELSE,        0,    0,
  51.     NULL,    ".endif",    S_ENDIF,    0,    0,
  52.     NULL,    ".include",    S_INCL,        0,    0,
  53.     NULL,    ".radix",    S_RADIX,    0,    0,
  54.     NULL,    ".org",        S_ORG,        0,    0,
  55.     NULL,    ".module",    S_MODUL,    0,    0,
  56.  
  57.     /* 6303 */
  58.  
  59.     NULL,    "aim",        S_TYP63,    0,    0x61,
  60.     NULL,    "oim",        S_TYP63,    0,    0x62,
  61.     NULL,    "eim",        S_TYP63,    0,    0x65,
  62.     NULL,    "tim",        S_TYP63,    0,    0x6B,
  63.  
  64.     NULL,    "xgdx",        S_INH63,    0,    0x18,
  65.     NULL,    "slp",        S_INH63,    0,    0x1A,
  66.  
  67.     /* 6801/6803 */
  68.  
  69.     NULL,    "bra",        S_BRA,        0,    0x20,
  70.     NULL,    "brn",        S_BRA,        0,    0x21,
  71.     NULL,    "bhi",        S_BRA,        0,    0x22,
  72.     NULL,    "bls",        S_BRA,        0,    0x23,
  73.     NULL,    "bcc",        S_BRA,        0,    0x24,
  74.     NULL,    "bhs",        S_BRA,        0,    0x24,
  75.     NULL,    "bcs",        S_BRA,        0,    0x25,
  76.     NULL,    "blo",        S_BRA,        0,    0x25,
  77.     NULL,    "bne",        S_BRA,        0,    0x26,
  78.     NULL,    "beq",        S_BRA,        0,    0x27,
  79.     NULL,    "bvc",        S_BRA,        0,    0x28,
  80.     NULL,    "bvs",        S_BRA,        0,    0x29,
  81.     NULL,    "bpl",        S_BRA,        0,    0x2A,
  82.     NULL,    "bmi",        S_BRA,        0,    0x2B,
  83.     NULL,    "bge",        S_BRA,        0,    0x2C,
  84.     NULL,    "blt",        S_BRA,        0,    0x2D,
  85.     NULL,    "bgt",        S_BRA,        0,    0x2E,
  86.     NULL,    "ble",        S_BRA,        0,    0x2F,
  87.     NULL,    "bsr",        S_BRA,        0,    0x8D,
  88.  
  89.     NULL,    "neg",        S_TYP1,        0,    0x40,
  90.     NULL,    "com",        S_TYP1,        0,    0x43,
  91.     NULL,    "lsr",        S_TYP1,        0,    0x44,
  92.     NULL,    "ror",        S_TYP1,        0,    0x46,
  93.     NULL,    "asr",        S_TYP1,        0,    0x47,
  94.     NULL,    "asl",        S_TYP1,        0,    0x48,
  95.     NULL,    "lsl",        S_TYP1,        0,    0x48,
  96.     NULL,    "rol",        S_TYP1,        0,    0x49,
  97.     NULL,    "dec",        S_TYP1,        0,    0x4A,
  98.     NULL,    "inc",        S_TYP1,        0,    0x4C,
  99.     NULL,    "tst",        S_TYP1,        0,    0x4D,
  100.     NULL,    "clr",        S_TYP1,        0,    0x4F,
  101.  
  102.     NULL,    "sub",        S_TYP2,        0,    0x80,
  103.     NULL,    "cmp",        S_TYP2,        0,    0x81,
  104.     NULL,    "sbc",        S_TYP2,        0,    0x82,
  105.     NULL,    "and",        S_TYP2,        0,    0x84,
  106.     NULL,    "bit",        S_TYP2,        0,    0x85,
  107.     NULL,    "lda",        S_TYP2,        0,    0x86,
  108.     NULL,    "sta",        S_TYP2,        0,    0x87,
  109.     NULL,    "eor",        S_TYP2,        0,    0x88,
  110.     NULL,    "adc",        S_TYP2,        0,    0x89,
  111.     NULL,    "ora",        S_TYP2,        0,    0x8A,
  112.     NULL,    "add",        S_TYP2,        0,    0x8B,
  113.  
  114.     NULL,    "suba",        S_TYP3,        0,    0x80,
  115.     NULL,    "subb",        S_TYP3,        0,    0xC0,
  116.     NULL,    "cmpa",        S_TYP3,        0,    0x81,
  117.     NULL,    "cmpb",        S_TYP3,        0,    0xC1,
  118.     NULL,    "sbca",        S_TYP3,        0,    0x82,
  119.     NULL,    "sbcb",        S_TYP3,        0,    0xC2,
  120.     NULL,    "subd",        S_TYP3,        0,    0x83,
  121.     NULL,    "addd",        S_TYP3,        0,    0xC3,
  122.     NULL,    "anda",        S_TYP3,        0,    0x84,
  123.     NULL,    "andb",        S_TYP3,        0,    0xC4,
  124.     NULL,    "bita",        S_TYP3,        0,    0x85,
  125.     NULL,    "bitb",        S_TYP3,        0,    0xC5,
  126.     NULL,    "ldaa",        S_TYP3,        0,    0x86,
  127.     NULL,    "ldab",        S_TYP3,        0,    0xC6,
  128.     NULL,    "staa",        S_TYP3,        0,    0x87,
  129.     NULL,    "stab",        S_TYP3,        0,    0xC7,
  130.     NULL,    "eora",        S_TYP3,        0,    0x88,
  131.     NULL,    "eorb",        S_TYP3,        0,    0xC8,
  132.     NULL,    "adca",        S_TYP3,        0,    0x89,
  133.     NULL,    "adcb",        S_TYP3,        0,    0xC9,
  134.     NULL,    "oraa",        S_TYP3,        0,    0x8A,
  135.     NULL,    "orab",        S_TYP3,        0,    0xCA,
  136.     NULL,    "adda",        S_TYP3,        0,    0x8B,
  137.     NULL,    "addb",        S_TYP3,        0,    0xCB,
  138.  
  139.     NULL,    "cpx",        S_TYP4,        0,    0x8C,
  140.     NULL,    "jsr",        S_TYP4,        0,    0x8D,
  141.     NULL,    "lds",        S_TYP4,        0,    0x8E,
  142.     NULL,    "sts",        S_TYP4,        0,    0x8F,
  143.     NULL,    "ldd",        S_TYP4,        0,    0xCC,
  144.     NULL,    "std",        S_TYP4,        0,    0xCD,
  145.     NULL,    "ldx",        S_TYP4,        0,    0xCE,
  146.     NULL,    "stx",        S_TYP4,        0,    0xCF,
  147.  
  148.     NULL,    "jmp",        S_TYP5,        0,    0x6E,
  149.  
  150.     NULL,    "aba",        S_INH,        0,    0x1B,
  151.     NULL,    "abx",        S_INH,        0,    0x3A,
  152.     NULL,    "asla",        S_INH,        0,    0x48,
  153.     NULL,    "aslb",        S_INH,        0,    0x58,
  154.     NULL,    "asld",        S_INH,        0,    0x05,
  155.     NULL,    "asra",        S_INH,        0,    0x47,
  156.     NULL,    "asrb",        S_INH,        0,    0x57,
  157.     NULL,    "cba",        S_INH,        0,    0x11,
  158.     NULL,    "clc",        S_INH,        0,    0x0C,
  159.     NULL,    "cli",        S_INH,        0,    0x0E,
  160.     NULL,    "clra",        S_INH,        0,    0x4F,
  161.     NULL,    "clrb",        S_INH,        0,    0x5F,
  162.     NULL,    "clv",        S_INH,        0,    0x0A,
  163.     NULL,    "coma",        S_INH,        0,    0x43,
  164.     NULL,    "comb",        S_INH,        0,    0x53,
  165.     NULL,    "daa",        S_INH,        0,    0x19,
  166.     NULL,    "deca",        S_INH,        0,    0x4A,
  167.     NULL,    "decb",        S_INH,        0,    0x5A,
  168.     NULL,    "des",        S_INH,        0,    0x34,
  169.     NULL,    "dex",        S_INH,        0,    0x09,
  170.     NULL,    "inca",        S_INH,        0,    0x4C,
  171.     NULL,    "incb",        S_INH,        0,    0x5C,
  172.     NULL,    "ins",        S_INH,        0,    0x31,
  173.     NULL,    "inx",        S_INH,        0,    0x08,
  174.     NULL,    "lsla",        S_INH,        0,    0x48,
  175.     NULL,    "lslb",        S_INH,        0,    0x58,
  176.     NULL,    "lsld",        S_INH,        0,    0x05,
  177.     NULL,    "lsra",        S_INH,        0,    0x44,
  178.     NULL,    "lsrb",        S_INH,        0,    0x54,
  179.     NULL,    "lsrd",        S_INH,        0,    0x04,
  180.     NULL,    "mul",        S_INH,        0,    0x3D,
  181.     NULL,    "nega",        S_INH,        0,    0x40,
  182.     NULL,    "negb",        S_INH,        0,    0x50,
  183.     NULL,    "nop",        S_INH,        0,    0x01,
  184.     NULL,    "psha",        S_INH,        0,    0x36,
  185.     NULL,    "pshb",        S_INH,        0,    0x37,
  186.     NULL,    "pshx",        S_INH,        0,    0x3C,
  187.     NULL,    "pula",        S_INH,        0,    0x32,
  188.     NULL,    "pulb",        S_INH,        0,    0x33,
  189.     NULL,    "pulx",        S_INH,        0,    0x38,
  190.     NULL,    "rola",        S_INH,        0,    0x49,
  191.     NULL,    "rolb",        S_INH,        0,    0x59,
  192.     NULL,    "rora",        S_INH,        0,    0x46,
  193.     NULL,    "rorb",        S_INH,        0,    0x56,
  194.     NULL,    "rti",        S_INH,        0,    0x3B,
  195.     NULL,    "rts",        S_INH,        0,    0x39,
  196.     NULL,    "sba",        S_INH,        0,    0x10,
  197.     NULL,    "sec",        S_INH,        0,    0x0D,
  198.     NULL,    "sei",        S_INH,        0,    0x0F,
  199.     NULL,    "sev",        S_INH,        0,    0x0B,
  200.     NULL,    "swi",        S_INH,        0,    0x3F,
  201.     NULL,    "tab",        S_INH,        0,    0x16,
  202.     NULL,    "tap",        S_INH,        0,    0x06,
  203.     NULL,    "tba",        S_INH,        0,    0x17,
  204.     NULL,    "tpa",        S_INH,        0,    0x07,
  205.     NULL,    "tsta",        S_INH,        0,    0x4D,
  206.     NULL,    "tstb",        S_INH,        0,    0x5D,
  207.     NULL,    "tsx",        S_INH,        0,    0x30,
  208.     NULL,    "txs",        S_INH,        0,    0x35,
  209.     NULL,    "wai",        S_INH,        0,    0x3E,
  210.  
  211.     NULL,    "pul",        S_PUL,        0,    0x32,
  212.     NULL,    "psh",        S_PUL,        S_END,    0x36,
  213. };
  214.